﻿Public Class Form1
  Private Sub Voce1_Click( _
          ByVal sender As System.Object,
          ByVal e As System.EventArgs) _
          Handles Voce1.Click
    TextBox1.Text &= " Voce n. 1"
  End Sub
  Private Sub Voce2_Click( _
          ByVal sender As System.Object,
          ByVal e As System.EventArgs) _
          Handles Voce2.Click
    TextBox1.Text &= " Voce n. 2"
  End Sub
  Private Sub Voce3_Click( _
          ByVal sender As System.Object,
          ByVal e As System.EventArgs) _
          Handles Voce3.Click
    TextBox1.Text &= " Voce n. 3"
  End Sub
End Class
